COMMENT ⊗ VALID 00002 PAGES
RECORD PAGE DESCRIPTION
00001 00001
00002 00002 BEGIN "TSTGO"
00003 ENDMK
⊗;
BEGIN "TSTGO"
PROCEDURE FOOBAR;
BEGIN "FOOBAR"
LABEL ERR;
SIMPLE PROCEDURE S1;
BEGIN GO TO ERR END;
PROCEDURE S2;
BEGIN INTEGER ARRAY F[1:1];
S1;
END;
S2;
ERR:
END "FOOBAR";
FOOBAR;
OUTSTR("MUMBLE");
END;